# name : R arsenal tableby controls
# key : arsenal.tableby.controls
# key : tableby.controls@arsenal
# contributor: Shuguang
# expand-env: ((yas-wrap-around-region 'nil))
# --
${1:my_controls} <- tableby.control(
  test = FALSE,
  total = T,
  numeric.test = "kwt", cat.test = "chisq",
  numeric.stats = c("N", "meansd", "median", "range"),
  cat.stats = c("N", "countpct"),
  stats.labels = list(
    N = "n",
    meansd = "Mean (SD)",
    median = "Median",
    range = "Min - Max"),
  digits = 1L)